home *** CD-ROM | disk | FTP | other *** search
- ;;
- ;; $Source: Devel:cs220/RCS/Install,v $
- ;; $Author: tsarna $
- ;; $Revision: 2.2 $
- ;; $Date: 1994/09/22 04:23:38 $
- ;;
- ;; Gage Drivers Installation Script
- ;;
- ;; (C) Copyright 1994 Endicor Technologies, Inc.
- ;; All Rights Reserved.
- ;;
-
-
- ; Make sure that we are running under at least OS 2.04
- (if (< (/ (getversion) 65536) 37)
- (abort "You must be using Kickstart 2.04 or higher to install and use the driver(s).")
- )
-
- (complete 0)
-
- (welcome "Welcome to the Gage Driver installation utility\n"
- )
-
- (set ddestdir
- (askdir
- (prompt
- "\nIn which disk (or drawer) should the driver(s) "
- "be installed or updated?"
- )
- (help @askdir-help)
- (default "SYS:Expansion")
- )
- )
- (if (NOT (exists ddestdir))
- (makedir ddestdir
- (infos)
- )
- )
-
- (complete 10)
-
- (copylib (source "Expansion/NULL")
- (dest ddestdir)
- (optional "force" "askuser")
- (infos)
- )
-
- (complete 20)
-
- (if (exists "Expansion/CS220")
- (copylib (source "Expansion/CS220")
- (dest ddestdir)
- (optional "force" "askuser")
- (infos)
- )
- )
-
- (complete 30)
-
- (set opts
- (askoptions
- (prompt "Please select which files you wish to install")
- (help "Select optional files to install")
- (choices
- "Autodocs (ASCII)"
- "Autodocs (PostScript)"
- "Include File (<devices/gagescope.h>)"
- )
- )
- )
-
- (complete 40)
-
- (set adestdir "AUTODOCS:")
- (if (IN opts 0)
- (
- (set adestdir
- (askdir
- (prompt
- "\nIn which directory should the Autodocs "
- "be installed or updated?"
- )
- (help @askdir-help)
- (default adestdir)
- )
- )
- (if (NOT (exists adestdir))
- (makedir adestdir
- (infos)
- )
- )
-
- (complete 50)
-
- (copyfiles
- (prompt "Installing ASCII Autodocs")
- (source "Docs/gage_xxx.doc")
- (dest adestdir)
- (infos)
- )
- )
- )
-
- (complete 60)
-
- (if (IN opts 1)
- (
- (set adestdir
- (askdir
- (prompt
- "\nIn which directory should the PostScript "
- "Autodocs be installed or updated?"
- )
- (help @askdir-help)
- (default adestdir)
- )
- )
- (if (NOT (exists adestdir))
- (makedir adestdir
- (infos)
- )
- )
-
- (complete 70)
-
- (copyfiles
- (prompt "Installing PostScript Autodocs")
- (source "Docs/gage_xxx.doc.ps")
- (dest adestdir)
- (infos)
- )
- )
- )
-
- (complete 80)
-
- (set idestdir "INCLUDE:devices")
- (if (IN opts 2)
- (
- (set idestdir
- (askdir
- (prompt
- "\nIn which directory should the <devices/gagescope.h> "
- "C header file be installed or updated?"
- )
- (help @askdir-help)
- (default idestdir)
- )
- )
- (if (NOT (exists idestdir))
- (makedir idestdir
- (infos)
- )
- )
-
- (complete 90)
-
- (copyfiles
- (prompt "Installing <devices/gagescope.h> C header file")
- (source "include/devices/gagescope.h")
- (dest idestdir)
- (infos)
- )
- )
- )
-
- (complete 100)
-
- (message
- "Installation Complete. Please check the tooltypes on the "
- "driver(s) in your Expansion drawer and verify that they "
- "match the configuration of your hardware."
- )
-
- (exit (quiet))
-